home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / C-Cl / CD-ROM Tutorial.cpt / CD-ROM Tutorial / card_56486.txt < prev    next >
Text File  |  1990-04-04  |  2KB  |  123 lines
  1. -- card: 56486 from stack: in
  2. -- bmap block id: 56796
  3. -- flags: 0000
  4. -- background id: 29299
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   delete line 1 of card field "ques"
  9.   hide card field "retell"
  10.   show card field "tell"
  11.   set lockScreen to false
  12.   set userLevel to 2
  13.   click at 65,91
  14. end openCard
  15.  
  16.  
  17.  
  18. -- part 1 (field)
  19. -- low flags: 00
  20. -- high flags: 2004
  21. -- rect: left=83 top=184 right=288 bottom=449
  22. -- title width / last selected line: 0
  23. -- icon id / first selected line: 0 / 0
  24. -- text alignment: 0
  25. -- font id: 21
  26. -- text size: 12
  27. -- style flags: 256
  28. -- line height: 16
  29. -- part name: tell
  30.  
  31.  
  32. -- part 2 (field)
  33. -- low flags: 00
  34. -- high flags: 0000
  35. -- rect: left=63 top=81 right=98 bottom=221
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 0 / 0
  38. -- text alignment: 0
  39. -- font id: 21
  40. -- text size: 12
  41. -- style flags: 256
  42. -- line height: 16
  43. -- part name: ques
  44.  
  45.  
  46. -- part 3 (button)
  47. -- low flags: 00
  48. -- high flags: 2000
  49. -- rect: left=209 top=130 right=151 bottom=290
  50. -- title width / last selected line: 0
  51. -- icon id / first selected line: 0 / 0
  52. -- text alignment: 1
  53. -- font id: 0
  54. -- text size: 12
  55. -- style flags: 0
  56. -- line height: 16
  57. -- part name: OK
  58. ----- HyperTalk script -----
  59. on mouseUp
  60.   if line 1 of card field ques is "bradley" then
  61.     set userLevel to 1
  62.     go to next card
  63.   else
  64.     delete line 1 of card field ques
  65.     hide card field "tell"
  66.     show card field "retell"
  67.   end if
  68.   click at 65,91
  69. end mouseUp
  70.  
  71.  
  72.  
  73.  
  74.  
  75. -- part 4 (field)
  76. -- low flags: 80
  77. -- high flags: 2004
  78. -- rect: left=82 top=184 right=267 bottom=439
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 0 / 0
  81. -- text alignment: 0
  82. -- font id: 21
  83. -- text size: 14
  84. -- style flags: 256
  85. -- line height: 18
  86. -- part name: retell
  87.  
  88.  
  89. -- part 5 (button)
  90. -- low flags: 00
  91. -- high flags: 2000
  92. -- rect: left=300 top=130 right=151 bottom=380
  93. -- title width / last selected line: 0
  94. -- icon id / first selected line: 0 / 0
  95. -- text alignment: 1
  96. -- font id: 0
  97. -- text size: 12
  98. -- style flags: 0
  99. -- line height: 16
  100. -- part name: Cancel
  101. ----- HyperTalk script -----
  102. on mouseUp
  103.   delete line 1 of card field "ques"
  104.   click at 65,91
  105. end mouseUp
  106.  
  107.  
  108.  
  109. -- part contents for card part 1
  110. ----- text -----
  111.  
  112. The program displays the BROWSE dialog box with a listing of main index headings in alphabetical order.
  113.  
  114. Type BRADLEY and click OK.
  115.  
  116. -- part contents for card part 4
  117. ----- text -----
  118.  
  119.              Type  BRADLEY  and Click OK
  120.  
  121. -- part contents for card part 2
  122. ----- text -----
  123. bradley